package com.tz.web.common;

import com.alibaba.fastjson.JSON;
import com.tz.util.TzConstant;
import com.tz.util.qiniuUtils.QiniuParamter;
import com.tz.util.qiniuUtils.QiniuUtil;
import org.apache.commons.fileupload.FileItem;
import org.apache.commons.fileupload.FileItemFactory;
import org.apache.commons.fileupload.FileUploadException;
import org.apache.commons.fileupload.disk.DiskFileItemFactory;
import org.apache.commons.fileupload.servlet.ServletFileUpload;
import org.springframework.stereotype.Controller;
import org.springframework.web.bind.annotation.RequestMapping;
import org.springframework.web.multipart.MultipartFile;
import org.springframework.web.multipart.commons.CommonsMultipartFile;
import org.springframework.web.multipart.support.DefaultMultipartHttpServletRequest;

import javax.servlet.ServletContext;
import javax.servlet.ServletException;
import javax.servlet.ServletOutputStream;
import javax.servlet.http.HttpServletRequest;
import javax.servlet.http.HttpServletResponse;
import java.io.File;
import java.io.IOException;
import java.io.PrintWriter;
import java.text.SimpleDateFormat;
import java.util.*;

@Controller
@RequestMapping("/kindEditor")
public class KindEditorController {

    public static String key_suff =  "good/";

    /**
     * 文件上传
     * @param request
     * @param response
     * @return
     * @throws javax.servlet.ServletException
     * @throws java.io.IOException
     * @throws org.apache.commons.fileupload.FileUploadException
     */
    @SuppressWarnings("rawtypes")
    @RequestMapping("/fileUpload")
    //@ResponseBody
    public void fileUpload(HttpServletRequest request,
                           HttpServletResponse response) throws ServletException, IOException,
            FileUploadException {
     //   ServletContext application = request.getSession().getServletContext();
       // String savePath = application.getRealPath("/") + "attached/";
        //文件保存本地目录路径
       // String savePath = "d:/attached/";
       String savePath = TzConstant.PATH_GOOD_PATH;

        // 文件保存目录URL
      //  String saveUrl = request.getContextPath() + "/attached/";
        //文件保存目录URL
        String saveUrl =  savePath;
       // String saveUrl = "http://" + request.getHeader("Host") + savePath.substring(17);
        // 定义允许上传的文件扩展名
        HashMap<String, String> extMap = new HashMap<String, String>();
        extMap.put("image", "gif,jpg,jpeg,png,bmp");
        extMap.put("flash", "swf,flv");
        extMap.put("media", "swf,flv,mp3,wav,wma,wmv,mid,avi,mpg,asf,rm,rmvb");
        extMap.put("file", "doc,docx,xls,xlsx,ppt,htm,html,xml,sql,txt,zip,rar,gz,bz2,pdf");

        // 最大文件大小
        long maxSize = 102400000;

        response.setContentType("text/html; charset=UTF-8");

        if (!ServletFileUpload.isMultipartContent(request)) {
            writeMsg(response, "请选择文件。");
            return;
        }
        // 检查目录
        File uploadDir = new File(savePath);
       /* if (!uploadDir.isDirectory()) {
            writeMsg(response, "上传目录不存在。");
            return;
        }*/
        if (!uploadDir.exists()) {
           /* writeMsg(response, "上传目录不存在。");
            return;*/
            uploadDir.mkdirs();
        }
        // 检查目录写权限
        if (!uploadDir.canWrite()) {
            writeMsg(response, "上传目录没有写权限。");
            return;
        }

        String dirName = request.getParameter("dir");
        if (dirName == null) {
            dirName = "image";
        }
        if (!extMap.containsKey(dirName)) {
            writeMsg(response, "目录名不正确。");
            return;
        }
        // 创建文件夹
        savePath += dirName + "/";
        saveUrl += dirName + "/";
        File saveDirFile = new File(savePath);
        if (!saveDirFile.exists()) {
            saveDirFile.mkdirs();
        }
        SimpleDateFormat sdf = new SimpleDateFormat("yyyyMMdd");
        String ymd = sdf.format(new Date());
        savePath += ymd + "/";
        saveUrl += ymd + "/";
        File dirFile = new File(savePath);
        if (!dirFile.exists()) {
            dirFile.mkdirs();
        }

        FileItemFactory factory = new DiskFileItemFactory();
        ServletFileUpload upload = new ServletFileUpload(factory);
        upload.setHeaderEncoding("UTF-8");
        List items = upload.parseRequest(request);
        DefaultMultipartHttpServletRequest mrequest= (DefaultMultipartHttpServletRequest)request;
        Map map=mrequest.getFileMap();
        Collection<MultipartFile> c = map.values();
        Iterator it = c.iterator();
        for (; it.hasNext();) {
            CommonsMultipartFile file = (CommonsMultipartFile) it.next();
            if (!file.isEmpty()) {
                long fileSize = file.getSize();
                String fileName = file.getOriginalFilename();
                String contentType = file.getContentType();
                String fileExt = fileName.substring(fileName.lastIndexOf(".") + 1).toLowerCase();

                if(fileSize > maxSize){
                    writeMsg(response, "上传文件大小超过限制。");
                    return;
                }
                if (!Arrays.<String>asList(extMap.get(dirName).split(",")).contains(fileExt)) {
                    writeMsg(response, "上传文件扩展名是不允许的扩展名。\n只允许" + extMap.get(dirName) + "格式。");
                    return;
                }
                FileItem item = null;
                SimpleDateFormat df = new SimpleDateFormat("yyyyMMddHHmmss");
                String newFileName = df.format(new Date()) + "_" + new Random().nextInt(1000) + "." + fileExt;
                try {
                    File uploadedFile = new File(savePath, newFileName);
                    file.transferTo(uploadedFile);
                } catch (Exception e) {
                    writeMsg(response, "上传文件失败。");
                    return;
                }
                //将图片上传到七牛云
                String key =  key_suff + UUID.randomUUID().toString();
                String upFilePath = saveUrl + newFileName;
                QiniuUtil.upload(upFilePath , key);
                //拼接七牛的路径:
                String imgurl = QiniuParamter.URL + key;
                Map<String, Object> msg = new HashMap<String, Object>();
                msg.put("error", 0);
                msg.put("url", imgurl);
                msg.put("title", fileName);
                //WebUtil.writerJson(response, msg);
                writeJson(response, msg);
            }else{
                writeMsg(response, "不可以上传空文件!");
            }
        }
    }

    /**
     * 输出信息
     * @param response
     * @param message
     */
    private void writeMsg(HttpServletResponse response, String message)
    {
        Map<String, Object> msg = new HashMap<String, Object>();
        msg.put("error", 1);
        msg.put("message", message);
        writeJson(response, msg);

    }

    /**
     *输出json
     * @param response
     * @param msg
     */
    private void writeJson(HttpServletResponse response, Object msg)
    {
        /************以下是解决避免ie下载文件 start*************/
        response.reset();
        response.setCharacterEncoding("UTF-8");
        response.setContentType("text/html");
        PrintWriter writer = null;
        try {
            writer = response.getWriter();

            writer.println(JSON.toJSONString(msg));

            writer.flush();
        } catch (IOException e) {
            e.printStackTrace();
        } finally {
            if (writer != null) {
                try {
                    writer.close();
                } catch (Exception e) {
                    e.printStackTrace();
                }
            }
        }
        /************以下是解决避免ie下载文件 end*************/
    }

    /**
     * 文件管理
     * @param request
     * @param response
     * @throws javax.servlet.ServletException
     * @throws java.io.IOException
     */
   @SuppressWarnings({ "rawtypes", "unchecked" })
    @RequestMapping(value = "/fileManager")
    public void fileManager(HttpServletRequest request,
                            HttpServletResponse response) throws ServletException, IOException {
        ServletContext application = request.getSession().getServletContext();
        ServletOutputStream out = response.getOutputStream();
        // 根目录路径，可以指定绝对路径，比如 /var/www/attached/
       // String rootPath = application.getRealPath("/") + "attached/";
        // 根目录URL，可以指定绝对路径，比如 http://www.yoursite.com/attached/
       // String rootUrl = request.getContextPath() + "/attached/";

        //根目录路径，可以指定绝对路径
       // String rootPath = "d:/attached/";
        String rootPath = TzConstant.PATH_QINIU_PATH;  //"g:/juhuawang/news/attached/";
        //根目录URL，可以指定绝对路径，比如 http://www.yoursite.com/attached/
        //String rootUrl  = request.getContextPath() + rootPath;
        String rootUrl  = rootPath;

        // 图片扩展名
        String[] fileTypes = new String[] { "gif", "jpg", "jpeg", "png", "bmp" };

        String dirName = request.getParameter("dir");
        if (dirName != null) {
            if (!Arrays.<String> asList(
                    new String[] { "image", "flash", "media", "file" })
                    .contains(dirName)) {
                out.println("Invalid Directory name.");
                return;
            }
            rootPath += dirName + "/";
            rootUrl += dirName + "/";
            File saveDirFile = new File(rootPath);
            if (!saveDirFile.exists()) {
                saveDirFile.mkdirs();
            }
        }
        // 根据path参数，设置各路径和URL
        String path = request.getParameter("path") != null ? request
                .getParameter("path") : "";
        String currentPath = rootPath + path;
        String currentUrl = rootUrl + path;
        String currentDirPath = path;
        String moveupDirPath = "";
        if (!"".equals(path)) {
            String str = currentDirPath.substring(0,
                    currentDirPath.length() - 1);
            moveupDirPath = str.lastIndexOf("/") >= 0 ? str.substring(0,
                    str.lastIndexOf("/") + 1) : "";
        }

        // 排序形式，name or size or type
        String order = request.getParameter("order") != null ? request
                .getParameter("order").toLowerCase() : "name";

        // 不允许使用..移动到上一级目录
        if (path.indexOf("..") >= 0) {
            out.println("Access is not allowed.");
            return;
        }
        // 最后一个字符不是/
        if (!"".equals(path) && !path.endsWith("/")) {
            out.println("Parameter is not valid.");
            return;
        }
        // 目录不存在或不是目录
        File currentPathFile = new File(currentPath);
        if (!currentPathFile.isDirectory()) {
            out.println("Directory does not exist.");
            return;
        }
        // 遍历目录取的文件信息
        List<Hashtable> fileList = new ArrayList<Hashtable>();
        if (currentPathFile.listFiles() != null) {
            for (File file : currentPathFile.listFiles()) {
                Hashtable<String, Object> hash = new Hashtable<String, Object>();
                String fileName = file.getName();
                if (file.isDirectory()) {
                    hash.put("is_dir", true);
                    hash.put("has_file", (file.listFiles() != null));
                    hash.put("filesize", 0L);
                    hash.put("is_photo", false);
                    hash.put("filetype", "");
                } else if (file.isFile()) {
                    String fileExt = fileName.substring(
                            fileName.lastIndexOf(".") + 1).toLowerCase();
                    hash.put("is_dir", false);
                    hash.put("has_file", false);
                    hash.put("filesize", file.length());
                    hash.put("is_photo", Arrays.<String> asList(fileTypes)
                            .contains(fileExt));
                    hash.put("filetype", fileExt);
                }
                hash.put("filename", fileName);
                hash.put("datetime",
                        new SimpleDateFormat("yyyy-MM-dd HH:mm:ss").format(file
                                .lastModified()));
                fileList.add(hash);

            }
        }

        if ("size".equals(order)) {
            Collections.sort(fileList, new SizeComparator());
        } else if ("type".equals(order)) {
            Collections.sort(fileList, new TypeComparator());
        } else {
            Collections.sort(fileList, new NameComparator());
        }
        Map<String, Object> msg = new HashMap<String, Object>();
        msg.put("moveup_dir_path", moveupDirPath);
        msg.put("current_dir_path", currentDirPath);
        msg.put("current_url", currentUrl);
        msg.put("total_count", fileList.size());
        msg.put("file_list", fileList);
        response.setContentType("application/json; charset=UTF-8");
        String msgStr = "";

        msgStr = JSON.toJSONString(msg);

        out.println(msgStr);

    }

    @SuppressWarnings("rawtypes")
    class NameComparator implements Comparator {
        public int compare(Object a, Object b) {
            Hashtable hashA = (Hashtable) a;
            Hashtable hashB = (Hashtable) b;
            if (((Boolean) hashA.get("is_dir"))
                    && !((Boolean) hashB.get("is_dir"))) {
                return -1;
            } else if (!((Boolean) hashA.get("is_dir"))
                    && ((Boolean) hashB.get("is_dir"))) {
                return 1;
            } else {
                return ((String) hashA.get("filename"))
                        .compareTo((String) hashB.get("filename"));
            }
        }
    }

    @SuppressWarnings("rawtypes")
    class SizeComparator implements Comparator {
        public int compare(Object a, Object b) {
            Hashtable hashA = (Hashtable) a;
            Hashtable hashB = (Hashtable) b;
            if (((Boolean) hashA.get("is_dir"))
                    && !((Boolean) hashB.get("is_dir"))) {
                return -1;
            } else if (!((Boolean) hashA.get("is_dir"))
                    && ((Boolean) hashB.get("is_dir"))) {
                return 1;
            } else {
                if (((Long) hashA.get("filesize")) > ((Long) hashB
                        .get("filesize"))) {
                    return 1;
                } else if (((Long) hashA.get("filesize")) < ((Long) hashB
                        .get("filesize"))) {
                    return -1;
                } else {
                    return 0;
                }
            }
        }
    }

    @SuppressWarnings("rawtypes")
    class TypeComparator implements Comparator {
        public int compare(Object a, Object b) {
            Hashtable hashA = (Hashtable) a;
            Hashtable hashB = (Hashtable) b;
            if (((Boolean) hashA.get("is_dir"))
                    && !((Boolean) hashB.get("is_dir"))) {
                return -1;
            } else if (!((Boolean) hashA.get("is_dir"))
                    && ((Boolean) hashB.get("is_dir"))) {
                return 1;
            } else {
                return ((String) hashA.get("filetype"))
                        .compareTo((String) hashB.get("filetype"));
            }
        }
    }

}
